object DlgFont: TDlgFont Left = 267 Top = 122 BorderIcons = [biSystemMenu, biHelp] BorderStyle = bsSingle ClientHeight = 425 ClientWidth = 477 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 16 object lblFontSize: TLabel Left = 8 Top = 35 Width = 28 Height = 13 Caption = 'Taille:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object TitreLbl: TLabel Left = 8 Top = 12 Width = 3 Height = 13 Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Button1: TButton Left = 393 Top = 12 Width = 72 Height = 22 HelpContext = 49 Default = True Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 OnClick = Button1Click end object Button2: TButton Left = 393 Top = 37 Width = 72 Height = 22 HelpContext = 44 Cancel = True Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 6 OnClick = Button2Click end object BitBtn1: TBitBtn Left = 393 Top = 65 Width = 72 Height = 22 HelpContext = 7 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 7 OnClick = Button3Click end object AttributPgCtrl: TPageControl Left = 4 Top = 156 Width = 469 Height = 269 ActivePage = TabSheet1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabIndex = 0 TabOrder = 0 object TabSheet1: TTabSheet object GroupBox1: TGroupBox Left = 8 Top = 12 Width = 444 Height = 50 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 object Label4: TLabel Left = 12 Top = 22 Width = 3 Height = 13 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object ColorButton1: TWin95ColorButton Left = 124 Top = 18 Width = 40 Height = 22 HelpContext = 89 Color = clNone ButtonCaption = '&More...' OnColorChange = ColorButton1ColorChange OnDblClick = ColorButton1DblClick end end object GroupBox3: TGroupBox Left = 8 Top = 67 Width = 444 Height = 167 TabOrder = 1 object Label5: TLabel Left = 12 Top = 23 Width = 3 Height = 13 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Bevel3: TBevel Left = 12 Top = 51 Width = 326 Height = 2 end object Label2: TLabel Left = 12 Top = 63 Width = 3 Height = 13 end object FontList: TListBox Left = 124 Top = 63 Width = 214 Height = 92 HelpContext = 296 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ItemHeight = 13 ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 2 OnClick = FontListClick OnKeyDown = FontListKeyDown OnMouseDown = FontListMouseDown end object HautBtn: TBitBtn Left = 345 Top = 111 Width = 22 Height = 22 HelpContext = 103 Caption = '5' Enabled = False Font.Charset = SYMBOL_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Marlett' Font.Style = [fsBold] ParentFont = False TabOrder = 4 OnClick = HautBtnClick Layout = blGlyphRight end object BasBtn: TBitBtn Left = 345 Top = 133 Width = 22 Height = 22 HelpContext = 102 Caption = '6' Enabled = False Font.Charset = SYMBOL_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'Marlett' Font.Style = [fsBold] ParentFont = False TabOrder = 5 OnClick = BasBtnClick Layout = blGlyphRight end object EffacerBtn: TButton Left = 345 Top = 63 Width = 86 Height = 21 HelpContext = 294 Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = EffacerBtnClick end object FontName: TComboBox Left = 124 Top = 20 Width = 214 Height = 21 HelpContext = 227 ItemHeight = 13 TabOrder = 0 OnChange = FontNameChange end object AjouterBtn: TButton Left = 345 Top = 20 Width = 86 Height = 21 HelpContext = 293 Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = AjouterBtnClick end end end object TabSheet2: TTabSheet HelpContext = 34 object Net1: TImage Left = 8 Top = 60 Width = 12 Height = 12 AutoSize = True end object CheckBox1: TCheckBox Left = 22 Top = 27 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = CheckBox1Click end object CheckBox10: TCheckBox Left = 22 Top = 43 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = CheckBox10Click end object CheckBox6: TCheckBox Left = 22 Top = 59 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = CheckBox6Click end object CheckBox19: TCheckBox Left = 22 Top = 75 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = CheckBox19Click end object CheckBox20: TCheckBox Left = 22 Top = 91 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 OnClick = CheckBox20Click end object CheckBox4: TCheckBox Left = 22 Top = 107 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 6 OnClick = CheckBox4Click end object CheckBox5: TCheckBox Left = 22 Top = 123 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 7 OnClick = CheckBox5Click end object CheckBox12: TCheckBox Left = 22 Top = 139 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 8 OnClick = CheckBox12Click end object CheckBox11: TCheckBox Left = 22 Top = 155 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 9 OnClick = CheckBox11Click end object CheckBox2: TCheckBox Left = 22 Top = 187 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 11 OnClick = CheckBox2Click end object CheckBox7: TCheckBox Left = 22 Top = 171 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 10 OnClick = CheckBox7Click end object CheckBox8: TCheckBox Left = 22 Top = 203 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 12 OnClick = CheckBox8Click end object CheckBox9: TCheckBox Left = 245 Top = 11 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 13 OnClick = CheckBox9Click end object CheckBox3: TCheckBox Left = 245 Top = 27 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 14 OnClick = CheckBox3Click end object CheckBox17: TCheckBox Left = 245 Top = 43 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 15 OnClick = CheckBox17Click end object CheckBox18: TCheckBox Left = 245 Top = 59 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 16 OnClick = CheckBox18Click end object CheckBox16: TCheckBox Left = 245 Top = 91 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 18 OnClick = CheckBox16Click end object CheckBox24: TCheckBox Left = 245 Top = 75 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 17 OnClick = CheckBox24Click end object CheckBox23: TCheckBox Left = 245 Top = 107 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 19 OnClick = CheckBox23Click end object CheckBox15: TCheckBox Left = 245 Top = 139 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 21 OnClick = CheckBox15Click end object CheckBox14: TCheckBox Left = 245 Top = 155 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 22 OnClick = CheckBox14Click end object CheckBox13: TCheckBox Left = 245 Top = 171 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 23 OnClick = CheckBox13Click end object CheckBox22: TCheckBox Left = 245 Top = 187 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 24 OnClick = CheckBox22Click end object CheckBox21: TCheckBox Left = 245 Top = 123 Width = 200 Height = 16 HelpContext = 34 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 20 OnClick = CheckBox21Click end object cbAcronym: TCheckBox Left = 22 Top = 11 Width = 200 Height = 16 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 end object cbQ: TCheckBox Left = 245 Top = 203 Width = 200 Height = 16 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 25 end end end object lbFontSize: TListBox Left = 23 Top = 72 Width = 52 Height = 70 HelpContext = 252 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( '1' '2' '3' '4' '5' '6' '7') ParentFont = False TabOrder = 3 OnClick = lbFontSizeClick end object EditFontSize: TEdit Left = 8 Top = 50 Width = 67 Height = 21 HelpContext = 252 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 2 ParentFont = False TabOrder = 2 Text = '3' OnChange = EditFontSizeChange end object GroupBox2: TGroupBox Left = 86 Top = 34 Width = 296 Height = 108 HelpContext = 146 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 object Panel2: TPanel Left = 10 Top = 18 Width = 275 Height = 80 HelpContext = 146 BevelOuter = bvNone BorderStyle = bsSingle Color = clWhite Ctl3D = True ParentCtl3D = False TabOrder = 0 object Label3: TLabel Left = 0 Top = 18 Width = 271 Height = 58 Align = alBottom Alignment = taCenter AutoSize = False Caption = 'AaBbYyZz' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = 'Arial' Font.Style = [] ParentFont = False end end end object cbMinMax: TCheckBox Left = 40 Top = 33 Width = 33 Height = 17 Caption = '+/-' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = cbMinMaxClick end object ChkBaseFont: TCheckBox Left = 228 Top = 148 Width = 165 Height = 17 HelpContext = 727 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 8 OnClick = ChkBaseFontClick end object Timer1: TTimer Enabled = False Interval = 500 OnTimer = Timer1Timer Left = 435 Top = 111 end end